/Whichever { /maincol exch def /stepcol exch def /corncol exch def /white 1 def currentscreen 3 1 roll pop pop 100 -1 2 atan 45 add 3 2 roll setscreen 48 120 translate false Steps LowerRight -48 296 translate true Steps UpperLeft } def
/PerspArc { /posneg exch def /to exch def /from exch def /rad exch def /y exch def /persp y y0 add viewht sub viewrad div def matrix currentmatrix 0 y translate 1 persp scale 0 0 rad from to posneg {arc} {arcn} ifelse setmatrix } def
/StayOne { /hiang exch def /loang exch def loang sin lowid mul loang cos lodep mul moveto hiang sin hiwid mul hiang cos hidep mul height add lineto stroke } def
/StayLeft {dup turn sub StayOne} def
/StayRight {dup turn add StayOne} def
/BandCalc { /halfthick exch def /bandht exch def bandht viewht lt {/halfthick halfthick neg def} if /ratio bandht height div def /x lowid 1 ratio sub mul hiwid turn cos mul ratio mul add def /y hiwid turn sin mul ratio mul def /bandrad x 2 exp y 2 exp add sqrt 1.035 mul def } def
/BandBack { BandCalc bandht halfthick sub bandrad 0 360 true PerspArc fill } def
/BandFront { BandCalc bandrad neg bandht halfthick sub moveto bandht halfthick sub bandrad 180 0 false PerspArc bandht halfthick add bandrad 0 180 true PerspArc closepath fill } def
/ShaftEtc { /y0 0 def /height 7 inch def /rad 10 def /lowid 60 def /hiwid 20 def /turn 135 def /lodep viewht neg viewrad div lowid mul def /hidep height viewht sub viewrad div hiwid mul def gsave black setgray 3.5 inch 3 BandBack 5.5 inch 3 BandBack 0.25 setlinewidth gold setgray 170 24 361 {StayLeft} for 22 24 213 {StayRight} for black setgray rad neg 0 moveto 0 rad 180 0 false PerspArc height rad 0 180 true PerspArc closepath fill gold setgray 2 24 169 {StayLeft} for -146 24 21 {StayRight} for black setgray 3.5 inch 3 BandFront 5.5 inch 3 BandFront grestore } def
/grayfn {/x exch def 1 1 -11 2 11 {10 div x 2 mul add mul exch} for 2 add exch 2 add div log x 2 exp 4 mul 2 15 div sub 2 exp 3 80 div add div 3 mul .6 add } def
/UFO { /astep exch def /bgrad exch def /count exch def /rstep bgrad count div def gsave count neg 2 count { count div grayfn setgray 0 0 bgrad 0 360 arc fill astep rotate 0 rstep neg translate /bgrad bgrad rstep sub def } for grestore } def
/CPMagic { /gold exch def /ufocol exch def /coast exch def /inland exch def /white 1 def /inch {72 mul} def newpath currentscreen 3 1 roll pop pop 100 0 3 2 roll setscreen gsave -0.75 inch 1.5 inch translate 45 rotate ufocol 0 eq {71 1.0 inch 15 UFO} if grestore gsave 3.6 1.2 scale DrawAust grestore 9 1.25 0.25 CentrePt gsave -0.75 inch 1.5 inch translate 45 rotate white setgray /Times-Bold findfont 12 scalefont setfont (MacMagic) -0.9 inch -8 0.9 inch 24 0 FitShear grestore } def
/Contents { setgray 351 669 moveto 62.991 0 rmoveto /Times-Bold findfont 18 scalefont setfont (CONTENTS)show 351 648 moveto /Times-Roman findfont 13 scalefont setfont 52.763 1 div 0 32(Exhibitors 2-3,)widthshow 3.250 0 rmoveto 52.763 1 div 0 32(6-7,)widthshow 3.250 0 rmoveto 52.763 1 div 0 32(10-11,)widthshow 3.250 0 rmoveto 52.763 1 div 0 32(14-15)widthshow 351 633 moveto (Contests:)show 351 622 moveto 48 0 rmoveto /Times-Roman findfont 10 scalefont setfont 60.620 1 div 0 32(Best)widthshow 2.500 0 rmoveto 60.620 1 div 0 32(Looking)widthshow 2.500 0 rmoveto 60.620 1 div 0 32(Document\(s\) 3)widthshow 351 611 moveto 48 0 rmoveto 18.970 1 div 0 32(Best)widthshow 2.500 0 rmoveto 18.970 1 div 0 32(Locally)widthshow 2.500 0 rmoveto 18.970 1 div 0 32(Developed)widthshow 2.500 0 rmoveto 18.970 1 div 0 32(Mac)widthshow 2.500 0 rmoveto 18.970 1 div 0 32(Product 7)widthshow 351 600 moveto 48 0 rmoveto 97.570 1 div 0 32(Best)widthshow 2.500 0 rmoveto 97.570 1 div 0 32(Use)widthshow 2.500 0 rmoveto 97.570 1 div 0 32(of)widthshow 2.500 0 rmoveto 97.570 1 div 0 32(Mac 11)widthshow 351 589 moveto 48 0 rmoveto 57.820 1 div 0 32(Best)widthshow 2.500 0 rmoveto 57.820 1 div 0 32(Musical)widthshow 2.500 0 rmoveto 57.820 1 div 0 32(Composition 15)widthshow 351 574 moveto /Times-Roman findfont 13 scalefont setfont 96.482 1 div 0 32(Conference)widthshow 3.250 0 rmoveto 96.482 1 div 0 32(Program 4-5)widthshow 351 559 moveto 105.153 1 div 0 32(Conference)widthshow 3.250 0 rmoveto 105.153 1 div 0 32(Speakers 5)widthshow 351 544 moveto 44.833 1 div 0 32(Hands-On)widthshow 3.250 0 rmoveto 44.833 1 div 0 32(Workshops)widthshow 3.250 0 rmoveto 44.833 1 div 0 32(Program 12)widthshow 351 529 moveto 41.934 1 div 0 32(Workshop)widthshow 3.250 0 rmoveto 41.934 1 div 0 32(Product)widthshow 3.250 0 rmoveto 41.934 1 div 0 32(Descriptions 13)widthshow 351 514 moveto 123.535 1 div 0 32(How)widthshow 3.250 0 rmoveto 123.535 1 div 0 32(to)widthshow 3.250 0 rmoveto 123.535 1 div 0 32(Register 13)widthshow } def
/NoteOne { setgray 351 472 moveto 60 0 rmoveto /Times-Bold findfont 13 scalefont setfont 1.873 2 div 0 32(SPECIAL NOTICE #1)widthshow 351 453 moveto 60 0 rmoveto 9.478 3 div 0 32(A national meeting of)widthshow 351 440 moveto 60 0 rmoveto 2.653 2 div 0 32(representatives of Mac)widthshow 351 427 moveto 60 0 rmoveto 23.908 3 div 0 32(user groups will be)widthshow 351 414 moveto 60 0 rmoveto 27.509 3 div 0 32(held in the staging)widthshow 351 401 moveto 60 0 rmoveto 10.583 2 div 0 32(area of Centrepoint's)widthshow 351 388 moveto 60 0 rmoveto 2.601 4 div 0 32(Grand Hall at 8:30 pm)widthshow 351 375 moveto 60 0 rmoveto (Friday, 8th November.)show newpath 405 372 moveto 546 372 lineto 546 485 lineto 405 485 lineto closepath stroke } def
/Register { setgray 72 428 moveto /Times-Bold findfont 14 scalefont setfont 2.974 5 div 0 32(To register to attend Macworld Expo)widthshow 72 413 moveto 9.162 3 div 0 32(Conference & Hands-On Workshop)widthshow 72 398 moveto 6.432 4 div 0 32(sessions call Macworld Expo Hotline)widthshow 72 383 moveto 6.460 5 div 0 32([in Sydney 260 0232, elsewhere \(008\))widthshow 72 368 moveto (23 0138] or see page 13 for details.)show 72 347 moveto /Times-Roman findfont 11 scalefont setfont 2.283 5 div 0 32(Discounted accommodation for Macworld Expo is)widthshow
72 335 moveto (available at Koala Park Regis Motel \(see page 13\).)show } def
/ExhibHrs { setgray 72 278 moveto /Times-Bold findfont 24 scalefont setfont 9.624 1 div 0 32(EXHIBITION HOURS)widthshow 72 248 moveto /Times-Roman findfont 18 scalefont setfont 22.002 1 div 0 32(Thursday)widthshow 4.500 0 rmoveto 22.002 1 div 0 32(7th 12)widthshow 4.500 0 rmoveto 22.002 1 div 0 32(noon\2619:00)widthshow 4.500 0 rmoveto 22.002 1 div 0 32(pm)widthshow 72 230 moveto 42.990 1 div 0 32(Friday)widthshow 4.500 0 rmoveto 42.990 1 div 0 32(8th 12)widthshow 4.500 0 rmoveto 42.990 1 div 0 32(noon\2619:00)widthshow 4.500 0 rmoveto 42.990 1 div 0 32(pm)widthshow 72 212 moveto 25.998 1 div 0 32(Saturday)widthshow 4.500 0 rmoveto 25.998 1 div 0 32(9th 9:00)widthshow 4.500 0 rmoveto 25.998 1 div 0 32(am\2616:00)widthshow 4.500 0 rmoveto 25.998 1 div 0 32(pm)widthshow 72 188 moveto /Times-Bold findfont 16 scalefont setfont 3.656 5 div 0 32(Admission $5.00 per person per day)widthshow } def
/NoteTwo { setgray 72 143 moveto 36 0 rmoveto /Times-Bold findfont 13 scalefont setfont 1.873 2 div 0 32(SPECIAL NOTICE #2)widthshow 72 124 moveto 36 0 rmoveto /Times-Bold findfont 11 scalefont setfont 11.674 4 div 0 32(A meeting of suppliers of)widthshow 72 113 moveto 36 0 rmoveto 2.819 3 div 0 32(Mac products interested in)widthshow 72 102 moveto 36 0 rmoveto 22.960 3 div 0 32(participating in a joint)widthshow 72 91 moveto 36 0 rmoveto 0.652 4 div 0 32(Australian stand at the San)widthshow 72 80 moveto 36 0 rmoveto 4.953 2 div 0 32(Francisco Macworld Expo)widthshow 72 69 moveto 36 0 rmoveto 4.942 4 div 0 32(next February will be held)widthshow 72 58 moveto 36 0 rmoveto 30.616 4 div 0 32(in the staging area of)widthshow 72 47 moveto 36 0 rmoveto 7.384 2 div 0 32(Centrepoint's Grand Hall)widthshow 72 36 moveto 36 0 rmoveto 9.518 4 div 0 32(at 8:30 pm Thursday, 7th)widthshow 72 25 moveto 36 0 rmoveto (November.)show newpath 102 22 moveto 243 22 lineto 243 156 lineto 102 156 lineto closepath stroke } def
/FrontPage { /black exch def /dkblue exch def /ltblue exch def /green exch def /red exch def /yellow exch def /gold exch def dkblue 1 ne {dkblue Headline} if green 1 ne {green Contents} if black 1 ne {black NoteOne} if dkblue 1 ne {dkblue Register} if red 1 ne {red ExhibHrs} if black 1 ne {black NoteTwo} if yellow 1 ne green 1 ne or ltblue 1 ne or black 1 ne or { /austfill yellow def /austbord yellow def /austedge green def /worldeven ltblue def /worldodd green def 72 468 261 ColorLogo } if green 1 ne ltblue 1 ne or dkblue 1 ne or { gsave 387 18 translate 3 8 div dup scale green ltblue dkblue Whichever grestore } if yellow 1 ne green 1 ne or red 1 ne or gold 1 ne or black 1 ne or { gsave 351 45 translate 0.7 0.7 scale yellow green red gold CPMagic grestore } if } def